home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / dev / src / ConfigFileSrc.lha / ConfigFileSrc12 / RexxLibrary / Funcs / GetName.c < prev    next >
Encoding:
Text File  |  1997-10-02  |  2.1 KB  |  96 lines
  1. /*
  2. **        $PROJECT: RexxConfigFile.library
  3. **        $FILE: GetName.c
  4. **        $DESCRIPTION: rxcf_Get#?Name() functions
  5. **
  6. **        (C) Copyright 1997 Marcel Karas
  7. **             All Rights Reserved.
  8. */
  9.  
  10. IMPORT struct Library *CFBase;
  11. IMPORT struct Library *RexxSysBase;
  12.  
  13. /****** rexxconfigfile.library/cf_GetGrpName *********************************
  14. *
  15. *   NAME
  16. *        cf_GetGrpName -- Get the name of a group node.
  17. *
  18. *   SYNOPSIS
  19. *        Name = cf_GetGrpName(GrpNode)
  20. *
  21. *        NAME cf_GetGrpName(GRPNODE/N/A)
  22. *
  23. *   FUNCTION
  24. *        This function get the name of a group node.
  25. *
  26. *   INPUTS
  27. *        GrpNode - The group node.
  28. *
  29. *   RESULT
  30. *        Name - The name of a group node.
  31. *
  32. *   EXAMPLE
  33. *        ...
  34. *        myGrpNode = cf_NewGroup(myHeader,"ExampleGroup")
  35. *
  36. *        GrpName = cf_GetGrpName(myGrpNode)
  37. *        SAY 'The name of the group node is' GrpName
  38. *        ...
  39. *
  40. *   SEE ALSO
  41. *        cf_GetArgName()
  42. *
  43. ******************************************************************************
  44. *
  45. */
  46.  
  47. UWORD rxcf_GetGrpName ( RX_FUNC_ARGS, CFGroup * GrpNode )
  48. {
  49.     STRPTR GrpName = cf_GetGrpName (GrpNode);
  50.  
  51.     *ResStr = CreateArgstring (GrpName, StrLen (GrpName));
  52.     return (RC_OK);
  53. }
  54.  
  55. /****** rexxconfigfile.library/cf_GetArgName *********************************
  56. *
  57. *   NAME
  58. *        cf_GetArgName -- Get the name of an argument node.
  59. *
  60. *   SYNOPSIS
  61. *        Name = cf_GetArgName(ArgNode)
  62. *
  63. *        NAME cf_GetArgName(ARGNODE/N/A)
  64. *
  65. *   FUNCTION
  66. *        This function get the name of an argument node.
  67. *
  68. *   INPUTS
  69. *        ArgNode - The argument node.
  70. *
  71. *   RESULT
  72. *        Name - The name of an argument node.
  73. *
  74. *   EXAMPLE
  75. *        ...
  76. *        myArgNode = cf_NewArgument(myGrpNode,"ExampleArgument")
  77. *
  78. *        ArgName = cf_GetArgName(myArgNode)
  79. *        SAY 'The name of the argument node is' ArgName
  80. *        ...
  81. *
  82. *   SEE ALSO
  83. *        cf_GetGrpName()
  84. *
  85. ******************************************************************************
  86. *
  87. */
  88.  
  89. UWORD rxcf_GetArgName ( RX_FUNC_ARGS, CFArgument * ArgNode )
  90. {
  91.     STRPTR ArgName = cf_GetArgName (ArgNode);
  92.  
  93.     *ResStr = CreateArgstring (ArgName, StrLen (ArgName));
  94.     return (RC_OK);
  95. }
  96.